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: RATATAT AATAAAAAAAAEAEAAATAAAAAERAAAAAERARAARAAAAAARERAAAEAAAARAAEAEAEAEEE 
i++ 
FACILITY: 
: Linked with VMB.EXE - part of the 
; bootstrap module for VAX 11/ 7730 h hardware. 
ENVIRONMENT : 


Runs at IPL 31, kernel mode, memory management is OFF, IS=1 
(running on interrupt stack), and code must be PIC. 


; ¢ FUNCTIONAL DESCRIPTION: 


This routine is 11/730 specific and 

locates the memory controller on the system, 

determines ¥ F much genery it controls, which pages of that 
are present (and good) hen the routine sets b 

in the PFN pltnae’ to represent each present (and good) 

page of memory. 


As a side effect, the routines store the type of adapter located 
at each bus slot in the RPB. 


INPUTS: 
RS - address of ist _ configuration code field 
R1 


- address of the SC 
1 - address of the RPB 
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v04-0 ° ' 2786-1382 33:63:95 Yeoors Ske BeMLRPSO OMAR: 1 . dy 
IMPLICIT INPUTS: 
The positions on the 11/730 Syqten bus are called slots, and are 
identified by slot numbers 0-16. The first slot is fixed and 
is the memory controller. The remaining 15 slots are floating. 


The 11/730 currently supports 1 memory controller, located at 
*xF20000. The TTF Pho docs not have interleaved memory. 


Memory controller registers also contain the starting page 
number / 128. This routine determines where the end of memory 
on a memory concroller is by analyzing the memory present map 
in the third memory controller register. 

OUTPUTS: 


R7, RB, R11, and SP are preserved 
ALC others (including AP and FP) are altered 


IMPLICIT OUTPUTS: 
The PFN bitmap is modified to describe all of physical memory. 


SOoOoooCooooooooooooooo 
SOOoOQCOoooooooooooooooooo 


RPBSL_PFNCNT stores the number of pages of physical memory. 


ALL single parity errors in memory are cleared. 
RPBSB_CONFREG describes each NEXUS on the system bus with an 
e 


adapter type code. 
AUTHOR: 
C. A. Samuelson, creation date 24-April-1981 
REVISION HISTORY: 
vO3-004 TCMO00S irudy §- Matthews 27-Apr-1983 


Change sense of CRDT flag from an enable fo an inhibit; i.e. 
remove pages with CRD errors by default. 
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100 v03-003 TCMO0004 Trudy C. Matthews 9-Feb-1983 

| 1 Fix bug in TCMO0002. 

1 § v03-002 TCM0003 rudy C. Matthews 26-Jan-1983 

104 Add support for RPBSV_CRDTEST flag; report pages with CRD 
: 5 errors as bad if this flag is set. 

1 § v03-001 KoOM0078 Kathleen D. Morse 15-Mar-1982 

! 3 Clear all MA780-specific boot flags. 
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-SBTTL Declarations 
DEFAULT DISPLACEMENT, WORD 


Page 


3 Macros to describe VMS data structures 


systgn dump file header definitions 
11/750 definitions 

Nexus device types 

Processor registers 

Restart parameter block 


sone ore 
$10730DEF 
SND TDEF 


SPROEF 
SRPBDEF 


3; Macros 
8 


Outputs an error string to the 
console terminal. 


.MACRO ERROR,STR 
BS ERROUT 


-ENDM = ERROR 
-PSECT YBTMEM,LONG 


ee meh a 
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-SBTTL CHECKMEM_730, Identify 11/730 memory 


ma. 
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; CHECKMEM_730, Locate and test memory for 11/730 


3; The table that follows erg ah the adapter type codes of adapters 


: located in fixed and floating 750 slots. 
ADAP_TYPE_730: ; Adapter type table for 11/730 
10 -BYTE NOTS_MEMIONI : nenory controller 0. 
saat nedaadliaa taal: +» BYTE 0 (15) : Floating slot. 


; Get address of slot assignment table. 


bd ' 
e } 
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CHECKMEM, 730: : ; Entry for 11/730 | 
52 ED AF 9E MOVAB ADAP_TYPE_730,R2 ; Set 1/730 fixed slot assignment | 
; table 
: Start Seetong slot positions to find adapters. First save the stack 
; position so it can be restored after a machine check. 
INIT SEARCH: ; Start searching for adapters 
5C 10 9A MOVZBL #10730S$AL_NNEX,AP 3; Set up nexus loop counter 
5D SE 00 MOVL SP,FP 3; Save current top of stack. 


OOOOOSCOSOCOSOSOOSOSOSOOOCOCOSOOSOOOSOOSOOOSOOOSOOSSSSo 3s 
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Set up the paysicet address of the Ist slot on the system bus and 
the address of the adapter type table. 


Ss 


9939 39 39 93939 39 39 539 33939 3 5 Ss SS 3S SSOSSOOSOSOSSSOSOSOSSSS 


NSS NSN AA AAA AAAAMMIMNMNIII OU BEEP EEE EI 


a ee et ee a tt a a tn Ss ss ts ts ts me a es ss 8 


8 
9 
0 
4 
54 O0F20000 9F 9 3 - i MOVAB a@#10730$AL_IOBASE ,R4 ; Get address of Ist slot 
021 3 
' : Sur ing this memory locate and test loop, the following registers are 
. used: 
1 0; 
1 13 RO - the gegtents of the slot’s configuration register; 
021 ¢ 3 the 3rd memory controller register; 
021 3 R1 - bit position within nenory present map; 
0 : r 3 R2 - ederess of the next byte in the 730-specific adapter 
: ype table 
1 6 : R3 @% 4 default adapter type for the current slot; 
1 3 number of last page on a controller 
1 3 : RG - address qf the configuration register at the current 
1 3 slot position 
1 ? : RS - address of next pyre in RPB adapter type table 
1 91; fee - address of the SC 
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v04 CHECRMEA TS00 daentity 147930" monary arSEE TIERS S8iG8:88 PONCE Mare ees oman:1 | 2% 62, 
1 138 : RO - bit s Sting in memory present map; 
1 13 3 starting PFN on a controller Coluays 0) 
1 194; R10 - address of the memory description List in RPB (pagcnt & pfn) 
; ! 132 3 R11 - address of the RPB 
1 199 : Initialize the RPB slot field to a zero and obtain the default adapter 
1 138 3 type for this slot. Then set up a machine check fault handler to gain 
1 199 ; control the loop addresses a non-existent configuration register 
! , 3; (an empty slot). Then read the slot's configuration register. 
! § : Initialize R10 (RPB memory descripter List pointer) for search loop 
SA ogee ge 9E 8 1 .s MOVAB RPBSL_MEMDSC(R11),R10 =; Set pointer to memory description List 
30 AB 00005800 SF CA 99 6 5 BICL #<RPBSM_MPM ' RPBSM_USEMPM ' RPBSM_FINDMEM>, - 
S : 06 RPBS$L_BOOTRS(R11) ; Clear all MA780-specific boot flags 
O2E 
O2E 13 TRY_NEXUS_730: 3 Memory locate and test loop. 
85 9 00 10 cCre (R5)+ 3 Assume nothing on slot. 
53 82 9A 00 11 MOVZBL (R2)+,R3 3; Get default adapter type. 
04 A? OO9D'CF YE 00 \§ MOVAB DO_NEXT_730+1,4(R7) : Set up fault handler (+1 for 
0039 1 ; handler execution on the 
0039 14 3 interrupt stack). 
50 64 00 0039 15 MOVL (R4),RO 3; Read CR at current slot. 
ge aie 
003¢ 18 : Execution continues here if the configuration register is present. 
003C 19 ; Load the adapter type into the RPB field. Then, if the adapter type 
03C 0; is a memory controller, proceed to test memory. Otherwise, move to 
03¢ 1 ; the next SBI slot. 
Ose 598° 
53 05 003C 4 TSTL R3 : Is this a floating slot? 
{5 0 3 5 BNEQ FIXED_SLOT : Branch if not 
FF AS 0 9 4 § MOVB RO,-1CR : Save type read from config register 
0 «(11 0044 f BRB CHECK_TYPE : Check if memory controller 
res 9 FIXED_SLOT: ; Slot is fixed assignment 
FF AS 53 90 Dota ? MOVB R3,-1(R5) : Save fixed type 
Rea § CHECK_TYPE: 3; Check adapter type for memory 
10 FFAS 91 4A 4 CMPB -1(R5) ,@NDTS_MEMIONI 3; Memory controller? 
4C 12 4 : BNEQ  DO_NEXT_730 : No, advance to next slot. 
5 ; 
a3 3 3; Memory controller found: 
5 3 Find out whether the memory addresses are within legal bounds by 
be 40; comayt ing the number of pages on the controller. 
5 41 ; Confirm that the ending page number is less or equal than the maximum 
: $s : page number for this machine. 
5 “a 
0 Ad 5 45 MOVL 8(R4),RO : Get starting address register. 
, - 3 0? 2? $8 C a? 3; Start with A. 138K a ty 
51 F 00 26 ts MOVL #15,R1 ; Start with top bit in map. 
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nd Test 11/730 Memor 15-SEP-1984 AX/VMS Macro V04- 
antidentity 147930 aeasry 4-S oats ri $3 63; che BOOTS.SRCJB nen? -MAR;1 
49 108: ; Bit extraction loop. 
EXTZV) R1,41,R0,R9 3; Extract one gre -. map. 
ADOL RI,R 3; Add it to 128K chunk total. 
SOBGEQ R1,10$ 3 Move to next ungi done. 
ASHL #8, RS,R3 3 conver’ @ nuaber 0 8K byte 
3 number of pages. 
¢ BBC #24,R0 gos 3 re , 494 a. wi 
§ ASHL #2,R3,8 3; Mult ply A, iy tor 64K chip memory 
208: MOVL  R3,(RIO)+ : Save # of pages in this memory 
38 ASSUME DMPSV_TR EQ 34 
ASSUME oat TR EQ 
$9 CLRB =1(R10) ; Store TR # in mem descr (always 0 
6 CLRL (R10)¢ ; Starting PFN for this aeaety (alw 
es CLRL Ro ; Starting address always 0 
65 3 abe 2 sterting memory test, establish a page skipping handler for 
3 machine chec 
oF 3; Also, enable to error reporting if not inhibited by RPB BOOTRS flag. 
9 Py 
Hf BBS #RPBSV_CRDTEST ; Branch if CRD test inhibited. 
71 PBS. BOoTRS(R11),308 
if $08 BISL #*xX10000000 ,4(R4) 3 Enable CRD reporting in memory CS 
74° = —-s MOVAB” «ss PAGE_MCHECK_730+1,4(R7) ; Set age skipping handler (+1 
75 : for interrupt stack 
7 PUSHL R2 : Save address of ‘ined nexus table. 
7 MOVAB TEST_QUAD_730,R2 3; Routine to test one page 
7 BSBW BOOSTE ST AER fem ; Test the specified range of PFN's 
7 POPR 3; Retrieve fixed nexus table addres 
39 BRB ALL_DONE_730 ; Only one memory controller 
ALIGN LONG 3; Longword-aligned handler. 


DO_NEXT_730: 
“MOVL 


MTPR 
MOVAB 
SOBGTR 


0 ALL_DONE 730: 
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rows’ handler for non-existent configuration register, or unreadable 
: —— sters, or a non-memory controller slot device. Restore stack 
: nter, clear all errors, and try for another slot if any remain. 


Skip to next slot. 
Restore stack pointer. 
; Clear any faults. 

Move to next slot. 

; If still a stot. loop. 


: Reestablish the normal machine check fault handler. 


; Reset SCB vector. 


: Indicate end of RPB memory descr List 


: Return to main routine. 
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Functional Description: 

Test a page of 730 memory, 
Calling Sequence: 

JSB TEST_QUAD_730 


Inputs: 
RO = starting address to test 
R1 = Quad word iteration count (64) 
Riis Address of 

Outputs: 


Returns via RSB if the entire page is OK 
Error exit via Machine Check code to BOOSPAGE_MCHECK 


TEST_QUAD_730: : Test 1 quadword at a time. 
0 7 cCra (RO) 3 Clear a quadword. 
80 0 01 CMPL (RO) +, (RO)+ 3; Read both longwords, and 


; advance to next quadword. 


If no gross errors occur in the clear to the quadword or in the 
subsequent read instruction, then execution continues below. Otherwise 
execution goes to the fault handler. 


SSSSAS AO AO AAA DOOGOOSH OH OSS HOS OS DODO Do DODO OOo DDO DOS 
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3; Handler that gains control when a page has gross memory errors. 


NAME WN SO OOO NA UNE WIN O ONAN WIN SO OOD NA UNE WIN 0 OO NAUES WIN "OOOO 


3 PAGE _MCHECK 730: ; Handle machine check. 
9 TPR #-1, #PRS_MCESR ; Clear error indicator. 
61 ERR_EXIT_730: 
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F851 =«FS SOBGTR R1,TEST QUAD 730 3: Continue clearing unless done. 
10 «€1 BBC #RPBSV RDTEST . : Check if user inhibited removing 
01 30 AB C RPBSL_BOOTRS(R11),10$ ; pages with CRD errors. 
: 5$: : If so, return success. 
C : 
C 3; Check for CRD error. 
f ios 
7E OOF 000s oF OD Cc VL ag 107 308A IOBASE+4,-(SP); Get aquary CSR 1. 
8E 40000000 8F 0D C BITL #*x40000000, (SP)+ 3 Check for CRO error. 
4 1 D EQL 5$ : Branch if no CRD error occurred. 
2 6 4 BRB ERR_EXIT_730 ; CRD error bit is read-to-clear. 
: ALIGN LONG ‘ ; ALL handlers longword-aligned. 
D 
D 
D 
D 
D 
D 
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! \"Pertormance_ indicators - } 
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Phase Page faults CPU Time Elapsed Time 


Initialization 35 8: 8 19 

Command processing 111 :00:00.7 3 

Pass 1 41 8: Bhs 

Puss. ¢ table sort , :00: 8:7 ae 96 

S table output :00:00. : : . 
bl 20 6 § 14 ‘¢ 

Psect synopsis output 1 8: 0:00.03 3 :00.36 

Cross-reference output 0 +38: 0. 0 0: 0-0 

Assembler run totals 656 0:00:17.24 0:00:46.7 


| 
2 yorking set Limit was 1500 pages. | 
a197 bytes ace pages) of virtual memory were used to buffer the intermediate code. 
feere were 40 pages of symbol table space allocated to hold 629 non-local and 5 local symbols. | 
3115 source Lines were read in Pass 1, producing 15 object records in Pass 2 
141 pages of virtual memory were used to define 140 macros. 
| 
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Macro Library name Macros defined 


-8255$0UA28: poets.¢ JJB00TS.MLB; 1 9 
“$255$DUA28: SYS.0B B.MLB; 

$255SDUA28: SYSLIBISTARLET MLB; 2 7 
TOTALS (all libraries) 10 


700 GETS were required to define 10 macros. 
There were no errors, warnings or information messages. 
MACRO/LIS=L1S$:B1MEM730/0BJ=0BJ$:BTMEM730 MASD$: CEMULAT.SRCIMISSING/UPDATE=(MASDS$ : CEMULAT.ENHJMISSING) +MASD$: CBOOTS.SRCJBTMEM730/UPD 
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